home *** CD-ROM | disk | FTP | other *** search
/ Ian & Stuart's Australian Mac 1 / Ian and Stuart's One (Australia).iso / Awards / MacUser Shareware Awards 94 / Telecom / 2. Anarchie-140 / Example Scripts / Find Clipboard < prev    next >
Text File  |  1994-05-10  |  268b  |  8 lines
  1. set theSearchItem to the clipboard
  2. tell application "Anarchie"
  3.     set theResult to find theSearchItem server "archie.rutgers.edu" matches 100 with window
  4.     if theResult is "" then
  5.         find theSearchItem server "archie.internic.net" matches 100 with window
  6.     end if
  7. end tell
  8.